home *** CD-ROM | disk | FTP | other *** search
/ Wonky Flux Batch 2019 02 / Wonky_Flux_Batch_2019-02.zip / Wonky Flux Batch 2019-02 / 003 - VCR Companion 1.dsk / VCRC.SYSTEM.asm < prev    next >
Assembly Source File  |  2019-02-16  |  19KB  |  801 lines

  1. 2000- 20 B9 21  JSR $21B9
  2. 2003- 20 E7 21  JSR $21E7
  3. 2006- AF        ???
  4. 2007- 20 36 05  JSR $0536
  5. 200A- AD 00 C0  LDA $C000
  6. 200D- 10 0E     BPL $201D
  7. 200F- 2C 10 C0  BIT $C010
  8. 2012- C9 96     CMP #$96
  9. 2014- D0 07     BNE $201D
  10. 2016- 20 E7 21  JSR $21E7
  11. 2019- D8        CLD
  12. 201A- 20 37 06  JSR $0637
  13. 201D- 20 E4 20  JSR $20E4
  14. 2020- F0 DE     BEQ $2000
  15. 2022- 20 2E 22  JSR $222E
  16. 2025- 20 FD 23  JSR $23FD
  17. 2028- C7        ???
  18. 2029- 20 B0 1E  JSR $1EB0
  19. 202C- 20 FD 23  JSR $23FD
  20. 202F- CC 20 B0  CPY $B020
  21. 2032- 17        ???
  22. 2033- AD 8B C0  LDA $C08B
  23. 2036- AD 8B C0  LDA $C08B
  24. 2039- A2 70     LDX #$70
  25. 203B- A0 D0     LDY #$D0
  26. 203D- A9 2F     LDA #$2F
  27. 203F- 20 7E 23  JSR $237E
  28. 2042- 20 00 08  JSR $0800
  29. 2045- 20 FD 23  JSR $23FD
  30. 2048- BD 20 B0  LDA $B020,X
  31. 204B- 3B        ???
  32. 204C- A2 70     LDX #$70
  33. 204E- A0 40     LDY #$40
  34. 2050- AD 92 24  LDA $2492
  35. 2053- F0 02     BEQ $2057
  36. 2055- A9 01     LDA #$01
  37. 2057- 18        CLC
  38. 2058- 6D 93 24  ADC $2493
  39. 205B- 20 7E 23  JSR $237E
  40. 205E- AD 92 24  LDA $2492
  41. 2061- 8D 6F 20  STA $206F
  42. 2064- AD 93 24  LDA $2493
  43. 2067- 8D 70 20  STA $2070
  44. 206A- 20 AB D0  JSR $D0AB
  45. 206D- 40        RTI
  46. 206E- 40        RTI
  47. 206F- 00        BRK
  48. 2070- 40        RTI
  49. 2071- C0 B0     CPY #$B0
  50. 2073- 13        ???
  51. 2074- 20 09 D0  JSR $D009
  52. 2077- 20 FD 23  JSR $23FD
  53. 207A- D1 20     CMP ($20),Y
  54. 207C- B0 16     BCS $2094
  55. 207E- 58        CLI
  56. 207F- 20 FC 08  JSR $08FC
  57. 2082- 53        ???
  58. 2083- 03        ???
  59. 2084- 4C 53 03  JMP $0353
  60. 2087- 20 B9 21  JSR $21B9
  61. 208A- 20 E7 21  JSR $21E7
  62. 208D- 97        ???
  63. 208E- 20 30 05  JSR $0530
  64. 2091- 4C FF 20  JMP $20FF
  65. 2094- 4C 11 03  JMP $0311
  66. 2097- 42        ???
  67. 2098- 41 44     EOR ($44,X)
  68. 209A- 60        RTS
  69. 209B- 56 43     LSR $43,X
  70. 209D- 52        ???
  71. 209E- 60        RTS
  72. 209F- 43        ???
  73. 20A0- 4F        ???
  74. 20A1- 4D 50 41  EOR $4150
  75. 20A4- 4E 49 4F  LSR $4F49
  76. 20A7- 4E 60 44  LSR $4460
  77. 20AA- 49 53     EOR #$53
  78. 20AC- 4B        ???
  79. 20AD- 61 00     ADC ($00,X)
  80. 20AF- 56 43     LSR $43,X
  81. 20B1- 52        ???
  82. 20B2- 60        RTS
  83. 20B3- 43        ???
  84. 20B4- 4F        ???
  85. 20B5- 4D 50 41  EOR $4150
  86. 20B8- 4E 49 4F  LSR $4F49
  87. 20BB- 4E 00 09  LSR $0900
  88. 20BE- 67        ???
  89. 20BF- 72        ???
  90. 20C0- 73        ???
  91. 20C1- 2F        ???
  92. 20C2- 74        ???
  93. 20C3- 69 74     ADC #$74
  94. 20C5- 6C 65     JMP ($65)
  95. 20C7- 04        ???
  96. 20C8- 6D 61 69  ADC $6961
  97. 20CB- 6E 04 64  ROR $6404
  98. 20CE- 68        PLA
  99. 20CF- 64        ???
  100. 20D0- 6F        ???
  101. 20D1- 06 77     ASL $77
  102. 20D3- 69 6E     ADC #$6E
  103. 20D5- 70 61     BVS $2138
  104. 20D7- 63        ???
  105. 20D8- D6 C5     DEC $C5,X
  106. 20DA- D2        ???
  107. 20DB- D3        ???
  108. 20DC- C9 CF     CMP #$CF
  109. 20DE- CE A0 B1  DEC $B1A0
  110. 20E1- AE B0 00  LDX $00B0
  111. 20E4- EE F4 03  INC $03F4
  112. 20E7- AD 98 BF  LDA $BF98
  113. 20EA- 29 30     AND #$30
  114. 20EC- C9 30     CMP #$30
  115. 20EE- F0 1F     BEQ $210F
  116. 20F0- 68        PLA
  117. 20F1- 68        PLA
  118. 20F2- 20 B9 21  JSR $21B9
  119. 20F5- 20 E7 21  JSR $21E7
  120. 20F8- 32        ???
  121. 20F9- 21 83     AND ($83,X)
  122. 20FB- 07        ???
  123. 20FC- 20 B6 21  JSR $21B6
  124. 20FF- 20 E7 21  JSR $21E7
  125. 2102- 53        ???
  126. 2103- 21 D8     AND ($D8,X)
  127. 2105- 05 20     ORA $20
  128. 2107- AD 21 20  LDA $2021
  129. 210A- B9 21 4C  LDA $4C21,Y
  130. 210D- 0A        ASL
  131. 210E- 22        ???
  132. 210F- 4C 2E 21  JMP $212E
  133. 2112- EA        NOP
  134. 2113- EA        NOP
  135. 2114- 20 B9 21  JSR $21B9
  136. 2117- 20 E7 21  JSR $21E7
  137. 211A- 6D 21 00  ADC $0021
  138. 211D- 07        ???
  139. 211E- 20 E7 21  JSR $21E7
  140. 2121- 96 21     STX $21,Y
  141. 2123- 5A        ???
  142. 2124- 06 20     ASL $20
  143. 2126- B6 21     LDX $21,Y
  144. 2128- 20 AD 21  JSR $21AD
  145. 212B- 4C B9 21  JMP $21B9
  146. 212E- EE 96 24  INC $2496
  147. 2131- 60        RTS
  148. 2132- D4        ???
  149. 2133- C8        INY
  150. 2134- C5 A0     CMP $A0
  151. 2136- D6 C3     DEC $C3,X
  152. 2138- D2        ???
  153. 2139- A0 C3     LDY #$C3
  154. 213B- CF        ???
  155. 213C- CD D0 C1  CMP $C1D0
  156. 213F- CE C9 CF  DEC $CFC9
  157. 2142- CE A0 D2  DEC $D2A0
  158. 2145- C5 D1     CMP $D1
  159. 2147- D5 C9     CMP $C9,X
  160. 2149- D2        ???
  161. 214A- C5 D3     CMP $D3
  162. 214C- A0 B1     LDY #$B1
  163. 214E- B2        ???
  164. 214F- B8        CLV
  165. 2150- CB        ???
  166. 2151- AE 00 D0  LDX $D000
  167. 2154- D2        ???
  168. 2155- C5 D3     CMP $D3
  169. 2157- D3        ???
  170. 2158- A0 C1     LDY #$C1
  171. 215A- CE D9 A0  DEC $A0D9
  172. 215D- CB        ???
  173. 215E- C5 D9     CMP $D9
  174. 2160- A0 D4     LDY #$D4
  175. 2162- CF        ???
  176. 2163- A0 D2     LDY #$D2
  177. 2165- C5 AD     CMP $AD
  178. 2167- C2        ???
  179. 2168- CF        ???
  180. 2169- CF        ???
  181. 216A- D4        ???
  182. 216B- AE 00 C9  LDX $C900
  183. 216E- CE D3 C5  DEC $C5D3
  184. 2171- D2        ???
  185. 2172- D4        ???
  186. 2173- A0 D6     LDY #$D6
  187. 2175- C3        ???
  188. 2176- D2        ???
  189. 2177- A0 C3     LDY #$C3
  190. 2179- CF        ???
  191. 217A- CD D0 C1  CMP $C1D0
  192. 217D- CE C9 CF  DEC $CFC9
  193. 2180- CE A0 D3  DEC $D3A0
  194. 2183- C9 C4     CMP #$C4
  195. 2185- C5 A0     CMP $A0
  196. 2187- B1 A0     LDA ($A0),Y
  197. 2189- C9 CE     CMP #$CE
  198. 218B- D4        ???
  199. 218C- CF        ???
  200. 218D- A0 C1     LDY #$C1
  201. 218F- A0 C4     LDY #$C4
  202. 2191- D2        ???
  203. 2192- C9 D6     CMP #$D6
  204. 2194- C5 00     CMP $00
  205. 2196- D0 D2     BNE $216A
  206. 2198- C5 D3     CMP $D3
  207. 219A- D3        ???
  208. 219B- A0 C1     LDY #$C1
  209. 219D- CE D9 A0  DEC $A0D9
  210. 21A0- CB        ???
  211. 21A1- C5 D9     CMP $D9
  212. 21A3- A0 D4     LDY #$D4
  213. 21A5- CF        ???
  214. 21A6- A0 C7     LDY #$C7
  215. 21A8- CF        ???
  216. 21A9- A0 CF     LDY #$CF
  217. 21AB- CE 00 AD  DEC $AD00
  218. 21AE- 00        BRK
  219. 21AF- C0 10     CPY #$10
  220. 21B1- FB        ???
  221. 21B2- 2C 10 C0  BIT $C010
  222. 21B5- 60        RTS
  223. 21B6- 4C DD FB  JMP $FBDD
  224. 21B9- 78        SEI
  225. 21BA- A9 04     LDA #$04
  226. 21BC- 85 7F     STA $7F
  227. 21BE- A0 00     LDY #$00
  228. 21C0- 84 7E     STY $7E
  229. 21C2- A9 A0     LDA #$A0
  230. 21C4- 91 7E     STA ($7E),Y
  231. 21C6- E6 7E     INC $7E
  232. 21C8- D0 02     BNE $21CC
  233. 21CA- E6 7F     INC $7F
  234. 21CC- A6 7E     LDX $7E
  235. 21CE- E0 78     CPX #$78
  236. 21D0- F0 04     BEQ $21D6
  237. 21D2- E0 F8     CPX #$F8
  238. 21D4- D0 EE     BNE $21C4
  239. 21D6- 8A        TXA
  240. 21D7- 18        CLC
  241. 21D8- 69 08     ADC #$08
  242. 21DA- 85 7E     STA $7E
  243. 21DC- D0 E4     BNE $21C2
  244. 21DE- E6 7F     INC $7F
  245. 21E0- A5 7F     LDA $7F
  246. 21E2- C9 08     CMP #$08
  247. 21E4- 90 DC     BCC $21C2
  248. 21E6- 60        RTS
  249. 21E7- 20 9A 23  JSR $239A
  250. 21EA- 04        ???
  251. 21EB- B1 70     LDA ($70),Y
  252. 21ED- 85 7E     STA $7E
  253. 21EF- C8        INY
  254. 21F0- B1 70     LDA ($70),Y
  255. 21F2- 85 7F     STA $7F
  256. 21F4- C8        INY
  257. 21F5- B1 70     LDA ($70),Y
  258. 21F7- 85 80     STA $80
  259. 21F9- C8        INY
  260. 21FA- B1 70     LDA ($70),Y
  261. 21FC- 85 81     STA $81
  262. 21FE- A0 00     LDY #$00
  263. 2200- B1 7E     LDA ($7E),Y
  264. 2202- F0 05     BEQ $2209
  265. 2204- 91 80     STA ($80),Y
  266. 2206- C8        INY
  267. 2207- D0 F7     BNE $2200
  268. 2209- 60        RTS
  269. 220A- 8D 08 C0  STA $C008
  270. 220D- AD 89 C0  LDA $C089
  271. 2210- AD 89 C0  LDA $C089
  272. 2213- 8D 0C C0  STA $C00C
  273. 2216- 8D 0E C0  STA $C00E
  274. 2219- 8D 7E C0  STA $C07E
  275. 221C- 8D 5F C0  STA $C05F
  276. 221F- 8D 53 C0  STA $C053
  277. 2222- 8D 51 C0  STA $C051
  278. 2225- 8D 54 C0  STA $C054
  279. 2228- CE F4 03  DEC $03F4
  280. 222B- 6C FC     JMP ($FC)
  281. 222D- FF        ???
  282. 222E- A2 90     LDX #$90
  283. 2230- BD F1 22  LDA $22F1,X
  284. 2233- 9D 00 03  STA $0300,X
  285. 2236- CA        DEX
  286. 2237- E0 FF     CPX #$FF
  287. 2239- D0 F5     BNE $2230
  288. 223B- A9 6C     LDA #$6C
  289. 223D- 8D A0 03  STA $03A0
  290. 2240- A9 03     LDA #$03
  291. 2242- 8D A1 03  STA $03A1
  292. 2245- A9 00     LDA #$00
  293. 2247- 85 C2     STA $C2
  294. 2249- 8D F2 03  STA $03F2
  295. 224C- A9 03     LDA #$03
  296. 224E- 8D F3 03  STA $03F3
  297. 2251- 49 A5     EOR #$A5
  298. 2253- 8D F4 03  STA $03F4
  299. 2256- 68        PLA
  300. 2257- 8D EE 22  STA $22EE
  301. 225A- 68        PLA
  302. 225B- 8D EB 22  STA $22EB
  303. 225E- AD 26 BF  LDA $BF26
  304. 2261- CD 10 BF  CMP $BF10
  305. 2264- D0 08     BNE $226E
  306. 2266- AD 27 BF  LDA $BF27
  307. 2269- CD 11 BF  CMP $BF11
  308. 226C- F0 2B     BEQ $2299
  309. 226E- AC 31 BF  LDY $BF31
  310. 2271- B9 32 BF  LDA $BF32,Y
  311. 2274- 29 F3     AND #$F3
  312. 2276- C9 B3     CMP #$B3
  313. 2278- F0 05     BEQ $227F
  314. 227A- 88        DEY
  315. 227B- 10 F4     BPL $2271
  316. 227D- 30 1A     BMI $2299
  317. 227F- B9 33 BF  LDA $BF33,Y
  318. 2282- 99 32 BF  STA $BF32,Y
  319. 2285- F0 03     BEQ $228A
  320. 2287- C8        INY
  321. 2288- D0 F5     BNE $227F
  322. 228A- AD 10 BF  LDA $BF10
  323. 228D- 8D 26 BF  STA $BF26
  324. 2290- AD 11 BF  LDA $BF11
  325. 2293- 8D 27 BF  STA $BF27
  326. 2296- CE 31 BF  DEC $BF31
  327. 2299- 38        SEC
  328. 229A- 20 1F FE  JSR $FE1F
  329. 229D- B0 02     BCS $22A1
  330. 229F- E6 C2     INC $C2
  331. 22A1- A4 C2     LDY $C2
  332. 22A3- 8D 09 C0  STA $C009
  333. 22A6- BA        TSX
  334. 22A7- 8E 00 01  STX $0100
  335. 22AA- A2 FF     LDX #$FF
  336. 22AC- 8E 01 01  STX $0101
  337. 22AF- 9A        TXS
  338. 22B0- 84 C2     STY $C2
  339. 22B2- A9 41     LDA #$41
  340. 22B4- 85 8A     STA $8A
  341. 22B6- A9 28     LDA #$28
  342. 22B8- 85 8B     STA $8B
  343. 22BA- A9 00     LDA #$00
  344. 22BC- 85 A7     STA $A7
  345. 22BE- 85 70     STA $70
  346. 22C0- 85 8C     STA $8C
  347. 22C2- 85 98     STA $98
  348. 22C4- 85 C0     STA $C0
  349. 22C6- 85 E3     STA $E3
  350. 22C8- 85 EC     STA $EC
  351. 22CA- 85 ED     STA $ED
  352. 22CC- 85 EE     STA $EE
  353. 22CE- 85 C9     STA $C9
  354. 22D0- 85 CA     STA $CA
  355. 22D2- 85 F0     STA $F0
  356. 22D4- 85 F1     STA $F1
  357. 22D6- 85 F2     STA $F2
  358. 22D8- A9 FF     LDA #$FF
  359. 22DA- 85 77     STA $77
  360. 22DC- 85 8E     STA $8E
  361. 22DE- 85 8F     STA $8F
  362. 22E0- 8D 00 1E  STA $1E00
  363. 22E3- 8D A3 03  STA $03A3
  364. 22E6- A9 1E     LDA #$1E
  365. 22E8- 85 A8     STA $A8
  366. 22EA- A9 FF     LDA #$FF
  367. 22EC- 48        PHA
  368. 22ED- A9 FF     LDA #$FF
  369. 22EF- 48        PHA
  370. 22F0- 60        RTS
  371. 22F1- 78        SEI
  372. 22F2- D8        CLD
  373. 22F3- 8D 09 C0  STA $C009
  374. 22F6- AD 8B C0  LDA $C08B
  375. 22F9- AD 8B C0  LDA $C08B
  376. 22FC- 20 69 D0  JSR $D069
  377. 22FF- 20 BA 08  JSR $08BA
  378. 2302- 8D 08 C0  STA $C008
  379. 2305- AD 89 C0  LDA $C089
  380. 2308- AD 89 C0  LDA $C089
  381. 230B- 8D 0C C0  STA $C00C
  382. 230E- 8D 0E C0  STA $C00E
  383. 2311- 8D 7E C0  STA $C07E
  384. 2314- 8D 5F C0  STA $C05F
  385. 2317- 8D 53 C0  STA $C053
  386. 231A- 8D 51 C0  STA $C051
  387. 231D- 8D 54 C0  STA $C054
  388. 2320- A2 01     LDX #$01
  389. 2322- A0 00     LDY #$00
  390. 2324- A9 A0     LDA #$A0
  391. 2326- 99 00 01  STA $0100,Y
  392. 2329- C8        INY
  393. 232A- D0 FA     BNE $2326
  394. 232C- EE 37 03  INC $0337
  395. 232F- E8        INX
  396. 2330- F0 0B     BEQ $233D
  397. 2332- E0 03     CPX #$03
  398. 2334- F0 F6     BEQ $232C
  399. 2336- E0 C0     CPX #$C0
  400. 2338- F0 F2     BEQ $232C
  401. 233A- 4C 33 03  JMP $0333
  402. 233D- EE F4 03  INC $03F4
  403. 2340- 58        CLI
  404. 2341- 6C FC     JMP ($FC)
  405. 2343- FF        ???
  406. 2344- 20 1A 09  JSR $091A
  407. 2347- A2 40     LDX #$40
  408. 2349- A0 20     LDY #$20
  409. 234B- 20 54 D0  JSR $D054
  410. 234E- 20 0F D0  JSR $D00F
  411. 2351- 20 C0 08  JSR $08C0
  412. 2354- 20 C3 08  JSR $08C3
  413. 2357- 20 0C D0  JSR $D00C
  414. 235A- 6C 03     JMP ($03)
  415. 235C- 08        PHP
  416. 235D- A2 80     LDX #$80
  417. 235F- A0 50     LDY #$50
  418. 2361- A9 02     LDA #$02
  419. 2363- 85 7E     STA $7E
  420. 2365- A9 30     LDA #$30
  421. 2367- 20 03 D0  JSR $D003
  422. 236A- 20 0B 09  JSR $090B
  423. 236D- 89        ???
  424. 236E- 03        ???
  425. 236F- 01 20     ORA ($20,X)
  426. 2371- 00        BRK
  427. 2372- 80        ???
  428. 2373- 20 1B D0  JSR $D01B
  429. 2376- 00        BRK
  430. 2377- 4C 09 D0  JMP $D009
  431. 237A- 03        ???
  432. 237B- 67        ???
  433. 237C- 66 76     ROR $76
  434. 237E- 85 88     STA $88
  435. 2380- 86 A2     STX $A2
  436. 2382- 84 A4     STY $A4
  437. 2384- A0 00     LDY #$00
  438. 2386- 84 A1     STY $A1
  439. 2388- 84 A3     STY $A3
  440. 238A- B1 A1     LDA ($A1),Y
  441. 238C- 91 A3     STA ($A3),Y
  442. 238E- C8        INY
  443. 238F- D0 F9     BNE $238A
  444. 2391- E6 A2     INC $A2
  445. 2393- E6 A4     INC $A4
  446. 2395- C6 88     DEC $88
  447. 2397- D0 F1     BNE $238A
  448. 2399- 60        RTS
  449. 239A- 68        PLA
  450. 239B- 85 7E     STA $7E
  451. 239D- 68        PLA
  452. 239E- 85 7F     STA $7F
  453. 23A0- E6 7E     INC $7E
  454. 23A2- D0 02     BNE $23A6
  455. 23A4- E6 7F     INC $7F
  456. 23A6- A0 00     LDY #$00
  457. 23A8- B1 7E     LDA ($7E),Y
  458. 23AA- AA        TAX
  459. 23AB- CA        DEX
  460. 23AC- 8E BE 23  STX $23BE
  461. 23AF- 68        PLA
  462. 23B0- 18        CLC
  463. 23B1- 69 01     ADC #$01
  464. 23B3- 85 70     STA $70
  465. 23B5- 68        PLA
  466. 23B6- 69 00     ADC #$00
  467. 23B8- 85 71     STA $71
  468. 23BA- A5 70     LDA $70
  469. 23BC- 18        CLC
  470. 23BD- 69 00     ADC #$00
  471. 23BF- AA        TAX
  472. 23C0- A5 71     LDA $71
  473. 23C2- 69 00     ADC #$00
  474. 23C4- 48        PHA
  475. 23C5- 8A        TXA
  476. 23C6- 48        PHA
  477. 23C7- A5 7F     LDA $7F
  478. 23C9- 48        PHA
  479. 23CA- A5 7E     LDA $7E
  480. 23CC- 48        PHA
  481. 23CD- 60        RTS
  482. 23CE- 68        PLA
  483. 23CF- 8D F9 23  STA $23F9
  484. 23D2- 68        PLA
  485. 23D3- 8D F6 23  STA $23F6
  486. 23D6- 78        SEI
  487. 23D7- BA        TSX
  488. 23D8- AD 16 C0  LDA $C016
  489. 23DB- 29 80     AND #$80
  490. 23DD- D0 0C     BNE $23EB
  491. 23DF- 8D 09 C0  STA $C009
  492. 23E2- 8E 00 01  STX $0100
  493. 23E5- AE 01 01  LDX $0101
  494. 23E8- 4C F4 23  JMP $23F4
  495. 23EB- 8E 01 01  STX $0101
  496. 23EE- AE 00 01  LDX $0100
  497. 23F1- 8D 08 C0  STA $C008
  498. 23F4- 9A        TXS
  499. 23F5- A9 FF     LDA #$FF
  500. 23F7- 48        PHA
  501. 23F8- A9 FF     LDA #$FF
  502. 23FA- 48        PHA
  503. 23FB- 58        CLI
  504. 23FC- 60        RTS
  505. 23FD- 20 9A 23  JSR $239A
  506. 2400- 02        ???
  507. 2401- B1 70     LDA ($70),Y
  508. 2403- 85 7E     STA $7E
  509. 2405- C8        INY
  510. 2406- B1 70     LDA ($70),Y
  511. 2408- 85 7F     STA $7F
  512. 240A- 88        DEY
  513. 240B- B1 7E     LDA ($7E),Y
  514. 240D- 99 00 02  STA $0200,Y
  515. 2410- C8        INY
  516. 2411- CC 00 02  CPY $0200
  517. 2414- 90 F5     BCC $240B
  518. 2416- F0 F3     BEQ $240B
  519. 2418- 20 CE 23  JSR $23CE
  520. 241B- 20 00 BF  JSR $BF00
  521. 241E- C4 71     CPY $71
  522. 2420- 24 B0     BIT $B0
  523. 2422- 48        PHA
  524. 2423- AD 76 24  LDA $2476
  525. 2426- 8D 90 24  STA $2490
  526. 2429- AD 77 24  LDA $2477
  527. 242C- 8D 91 24  STA $2491
  528. 242F- 20 00 BF  JSR $BF00
  529. 2432- C8        INY
  530. 2433- 83        ???
  531. 2434- 24 B0     BIT $B0
  532. 2436- 34        ???
  533. 2437- AD 88 24  LDA $2488
  534. 243A- 8D 8A 24  STA $248A
  535. 243D- 8D 8F 24  STA $248F
  536. 2440- 8D 97 24  STA $2497
  537. 2443- 20 00 BF  JSR $BF00
  538. 2446- D1 89     CMP ($89),Y
  539. 2448- 24 AD     BIT $AD
  540. 244A- 8B        ???
  541. 244B- 24 8D     BIT $8D
  542. 244D- 92        ???
  543. 244E- 24 AD     BIT $AD
  544. 2450- 8C 24 8D  STY $8D24
  545. 2453- 93        ???
  546. 2454- 24 20     BIT $20
  547. 2456- 00        BRK
  548. 2457- BF        ???
  549. 2458- CA        DEX
  550. 2459- 8E 24 08  STX $0824
  551. 245C- 20 00 BF  JSR $BF00
  552. 245F- CC 96 24  CPY $2496
  553. 2462- 28        PLP
  554. 2463- B0 06     BCS $246B
  555. 2465- 20 CE 23  JSR $23CE
  556. 2468- 78        SEI
  557. 2469- 18        CLC
  558. 246A- 60        RTS
  559. 246B- 20 CE 23  JSR $23CE
  560. 246E- 78        SEI
  561. 246F- 38        SEC
  562. 2470- 60        RTS
  563. 2471- 0A        ASL
  564. 2472- 00        BRK
  565. 2473- 02        ???
  566. 2474- 00        BRK
  567. 2475- 00        BRK
  568. 2476- 00        BRK
  569. 2477- 00        BRK
  570. 2478- 00        BRK
  571. 2479- 00        BRK
  572. 247A- 00        BRK
  573. 247B- 00        BRK
  574. 247C- 00        BRK
  575. 247D- 00        BRK
  576. 247E- 00        BRK
  577. 247F- 00        BRK
  578. 2480- 00        BRK
  579. 2481- 00        BRK
  580. 2482- 00        BRK
  581. 2483- 03        ???
  582. 2484- 00        BRK
  583. 2485- 02        ???
  584. 2486- 00        BRK
  585. 2487- 60        RTS
  586. 2488- 00        BRK
  587. 2489- 02        ???
  588. 248A- 00        BRK
  589. 248B- 00        BRK
  590. 248C- 00        BRK
  591. 248D- 00        BRK
  592. 248E- 04        ???
  593. 248F- 00        BRK
  594. 2490- 00        BRK
  595. 2491- 00        BRK
  596. 2492- 00        BRK
  597. 2493- 00        BRK
  598. 2494- 00        BRK
  599. 2495- 00        BRK
  600. 2496- 00        BRK
  601. 2497- 00        BRK
  602. 2498- AD 30 BF  LDA $BF30
  603. 249B- 29 F0     AND #$F0
  604. 249D- 8D B8 24  STA $24B8
  605. 24A0- A0 00     LDY #$00
  606. 24A2- B9 32 BF  LDA $BF32,Y
  607. 24A5- 29 F0     AND #$F0
  608. 24A7- CD 30 BF  CMP $BF30
  609. 24AA- F0 0F     BEQ $24BB
  610. 24AC- C8        INY
  611. 24AD- D0 F3     BNE $24A2
  612. 24AF- 38        SEC
  613. 24B0- B0 3A     BCS $24EC
  614. 24B2- B9 32 BF  LDA $BF32,Y
  615. 24B5- 29 F0     AND #$F0
  616. 24B7- C9 FF     CMP #$FF
  617. 24B9- F0 31     BEQ $24EC
  618. 24BB- 8C E3 24  STY $24E3
  619. 24BE- 85 2B     STA $2B
  620. 24C0- 4A        LSR
  621. 24C1- 4A        LSR
  622. 24C2- 4A        LSR
  623. 24C3- 4A        LSR
  624. 24C4- 29 07     AND #$07
  625. 24C6- 09 C0     ORA #$C0
  626. 24C8- 85 81     STA $81
  627. 24CA- A2 00     LDX #$00
  628. 24CC- 86 80     STX $80
  629. 24CE- BC F3 24  LDY $24F3,X
  630. 24D1- B1 80     LDA ($80),Y
  631. 24D3- DD F8 24  CMP $24F8,X
  632. 24D6- D0 0A     BNE $24E2
  633. 24D8- E8        INX
  634. 24D9- E0 05     CPX #$05
  635. 24DB- 90 F1     BCC $24CE
  636. 24DD- 20 FD 24  JSR $24FD
  637. 24E0- 90 0A     BCC $24EC
  638. 24E2- A0 FF     LDY #$FF
  639. 24E4- 88        DEY
  640. 24E5- 10 CB     BPL $24B2
  641. 24E7- AC 31 BF  LDY $BF31
  642. 24EA- D0 C6     BNE $24B2
  643. 24EC- AD B8 24  LDA $24B8
  644. 24EF- 8D 30 BF  STA $BF30
  645. 24F2- 60        RTS
  646. 24F3- 01 03     ORA ($03,X)
  647. 24F5- 05 07     ORA $07
  648. 24F7- FF        ???
  649. 24F8- 20 00 03  JSR $0300
  650. 24FB- 3C        ???
  651. 24FC- 00        BRK
  652. 24FD- A5 2B     LDA $2B
  653. 24FF- 8D 0D 25  STA $250D
  654. 2502- 20 00 BF  JSR $BF00
  655. 2505- C5 0C     CMP $0C
  656. 2507- 25 F0     AND $F0
  657. 2509- 0B        ???
  658. 250A- 38        SEC
  659. 250B- 60        RTS
  660. 250C- 02        ???
  661. 250D- 00        BRK
  662. 250E- 00        BRK
  663. 250F- 60        RTS
  664. 2510- 04        ???
  665. 2511- 56 43     LSR $43,X
  666. 2513- 52        ???
  667. 2514- 31 AD     AND ($AD),Y
  668. 2516- 00        BRK
  669. 2517- 60        RTS
  670. 2518- 29 0F     AND #$0F
  671. 251A- C9 04     CMP #$04
  672. 251C- D0 EC     BNE $250A
  673. 251E- AA        TAX
  674. 251F- BD 00 60  LDA $6000,X
  675. 2522- DD 10 25  CMP $2510,X
  676. 2525- D0 E3     BNE $250A
  677. 2527- CA        DEX
  678. 2528- D0 F5     BNE $251F
  679. 252A- A2 F0     LDX #$F0
  680. 252C- B5 00     LDA $00,X
  681. 252E- 9D 00 02  STA $0200,X
  682. 2531- E8        INX
  683. 2532- D0 F8     BNE $252C
  684. 2534- A9 0A     LDA #$0A
  685. 2536- 85 F4     STA $F4
  686. 2538- A5 2B     LDA $2B
  687. 253A- 29 70     AND #$70
  688. 253C- 85 2B     STA $2B
  689. 253E- AA        TAX
  690. 253F- BD 89 C0  LDA $C089,X
  691. 2542- BD 8E C0  LDA $C08E,X
  692. 2545- A9 CD     LDA #$CD
  693. 2547- 85 F6     STA $F6
  694. 2549- A9 25     LDA #$25
  695. 254B- 85 F7     STA $F7
  696. 254D- A9 80     LDA #$80
  697. 254F- 85 F5     STA $F5
  698. 2551- C6 F5     DEC $F5
  699. 2553- F0 5C     BEQ $25B1
  700. 2555- 20 D5 25  JSR $25D5
  701. 2558- B0 57     BCS $25B1
  702. 255A- A5 F1     LDA $F1
  703. 255C- C9 07     CMP #$07
  704. 255E- D0 F1     BNE $2551
  705. 2560- A0 00     LDY #$00
  706. 2562- BD 8C C0  LDA $C08C,X
  707. 2565- 10 FB     BPL $2562
  708. 2567- 88        DEY
  709. 2568- F0 47     BEQ $25B1
  710. 256A- C9 D5     CMP #$D5
  711. 256C- D0 F4     BNE $2562
  712. 256E- A0 00     LDY #$00
  713. 2570- BD 8C C0  LDA $C08C,X
  714. 2573- 10 FB     BPL $2570
  715. 2575- 88        DEY
  716. 2576- F0 39     BEQ $25B1
  717. 2578- C9 E7     CMP #$E7
  718. 257A- D0 F4     BNE $2570
  719. 257C- BD 8C C0  LDA $C08C,X
  720. 257F- 10 FB     BPL $257C
  721. 2581- C9 E7     CMP #$E7
  722. 2583- D0 2C     BNE $25B1
  723. 2585- BD 8C C0  LDA $C08C,X
  724. 2588- 10 FB     BPL $2585
  725. 258A- C9 E7     CMP #$E7
  726. 258C- D0 23     BNE $25B1
  727. 258E- BD 8D C0  LDA $C08D,X
  728. 2591- A0 10     LDY #$10
  729. 2593- 24 06     BIT $06
  730. 2595- BD 8C C0  LDA $C08C,X
  731. 2598- 10 FB     BPL $2595
  732. 259A- 88        DEY
  733. 259B- F0 14     BEQ $25B1
  734. 259D- C9 EE     CMP #$EE
  735. 259F- D0 F4     BNE $2595
  736. 25A1- A0 07     LDY #$07
  737. 25A3- BD 8C C0  LDA $C08C,X
  738. 25A6- 10 FB     BPL $25A3
  739. 25A8- D1 F6     CMP ($F6),Y
  740. 25AA- D0 05     BNE $25B1
  741. 25AC- 88        DEY
  742. 25AD- 10 F4     BPL $25A3
  743. 25AF- 30 03     BMI $25B4
  744. 25B1- 4C C4 25  JMP $25C4
  745. 25B4- A0 F0     LDY #$F0
  746. 25B6- B9 00 02  LDA $0200,Y
  747. 25B9- 99 00 00  STA $0000,Y
  748. 25BC- C8        INY
  749. 25BD- D0 F7     BNE $25B6
  750. 25BF- BD 88 C0  LDA $C088,X
  751. 25C2- 18        CLC
  752. 25C3- 60        RTS
  753. 25C4- C6 F4     DEC $F4
  754. 25C6- F0 03     BEQ $25CB
  755. 25C8- 4C 4D 25  JMP $254D
  756. 25CB- 38        SEC
  757. 25CC- 60        RTS
  758. 25CD- FC        ???
  759. 25CE- EE EE FC  INC $FCEE
  760. 25D1- E7        ???
  761. 25D2- EE FC E7  INC $E7FC
  762. 25D5- A0 FD     LDY #$FD
  763. 25D7- 84 F8     STY $F8
  764. 25D9- C8        INY
  765. 25DA- D0 04     BNE $25E0
  766. 25DC- E6 F8     INC $F8
  767. 25DE- F0 3D     BEQ $261D
  768. 25E0- BD 8C C0  LDA $C08C,X
  769. 25E3- 10 FB     BPL $25E0
  770. 25E5- C9 D5     CMP #$D5
  771. 25E7- D0 F0     BNE $25D9
  772. 25E9- EA        NOP
  773. 25EA- BD 8C C0  LDA $C08C,X
  774. 25ED- 10 FB     BPL $25EA
  775. 25EF- C9 AA     CMP #$AA
  776. 25F1- D0 F2     BNE $25E5
  777. 25F3- A0 03     LDY #$03
  778. 25F5- BD 8C C0  LDA $C08C,X
  779. 25F8- 10 FB     BPL $25F5
  780. 25FA- C9 96     CMP #$96
  781. 25FC- D0 E7     BNE $25E5
  782. 25FE- A9 00     LDA #$00
  783. 2600- 85 F9     STA $F9
  784. 2602- BD 8C C0  LDA $C08C,X
  785. 2605- 10 FB     BPL $2602
  786. 2607- 2A        ROL
  787. 2608- 85 F8     STA $F8
  788. 260A- BD 8C C0  LDA $C08C,X
  789. 260D- 10 FB     BPL $260A
  790. 260F- 25 F8     AND $F8
  791. 2611- 99 F0 00  STA $00F0,Y
  792. 2614- 45 F9     EOR $F9
  793. 2616- 88        DEY
  794. 2617- 10 E7     BPL $2600
  795. 2619- A8        TAY
  796. 261A- EA        NOP
  797. 261B- 18        CLC
  798. 261C- 60        RTS
  799. 261D- 38        SEC
  800. 261E- 60        RTS
  801.